home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 401-425 / disk_403 / rexxhostlib / glue.lzh / GetToken.asm < prev    next >
Assembly Source File  |  1990-09-18  |  202b  |  16 lines
  1.     xref    _RexxHostBase
  2.     xdef    _GetToken
  3.  
  4.     section    text,code
  5.  
  6. _GetToken:
  7.     movem.l    a6/a2,-(sp)
  8.     move.l    _RexxHostBase,a6
  9.     movem.l    12(sp),a0/a1/a2
  10.     move.l    24(sp),d0
  11.     jsr    -84(a6)
  12.     movem.l    (sp)+,a6/a2
  13.     rts
  14.  
  15.     end
  16.